msgInfo_t = getMonitoredMessage( *ON|*OFF );
Retrieves the latest *ESCAPE message from the job log.
Optionally removes the message from the log. Usually called within
the 'on-error' section of a 'monitor' block.
Returns a data structure with the following information:
id | - | Message ID. |
text | - | First level text. |
pgm | - | Sender: program name. |
mod | - | Sender: module name. |
proc | - | Sender: procedure name. |
specNb | - | Sender: statement number. |
monitor;
a = 10;
b = 0; // Attempt made to divide by zero for
c = a / b; // fixed point operation. (MCH1211)
fail( 'Division by zero did not raise an error.' );
on-error;
msgInfo = getMonitoredMessage(*ON); // remove message
endmon; // from job log
aEqual( 'MCH1211': msgInfo.Id );